home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PCMania 73
/
PCMania CD73_1.iso
/
sharewar
/
utiles
/
dlsupcbf
/
DLSupCBF.exe
/
0
/
RCDATA
/
TFRMVSPLIT
/
TFRMVSPLIT.txt
Wrap
Text File
|
1998-09-02
|
16KB
|
523 lines
object FrmVSplit: TFrmVSplit
Tag = 2
Left = 132
Top = 121
Width = 638
Height = 406
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Caption =
'DLSupCBF - DLSuperC Side-By-Side Binary File Compare Program D' +
'isplay of Comparison Result'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
Position = poScreenCenter
PrintScale = poNone
OnActivate = FormActivate
OnClose = FormClose
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 16
object LsSplitter1: TSplitter
Left = 425
Top = 81
Width = 9
Height = 239
Cursor = crHSplit
end
object VLbListBox2: TOvcVirtualListbox
Left = 0
Top = 81
Width = 425
Height = 239
HeaderColor.BackColor = clBtnFace
HeaderColor.TextColor = clNavy
IntegralHeight = False
ProtectColor.BackColor = clRed
ProtectColor.TextColor = clWhite
RowHeight = 14
ScrollBars = ssBoth
SelectColor.BackColor = clHighlight
SelectColor.TextColor = clHighlightText
OnGetItem = VLbListBox2GetItem
OnGetItemColor = VLbListBox2GetItemColor
OnTopIndexChanged = VLbListBox2TopIndexChanged
Align = alLeft
Controller = OvcController2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object VlbListbox3: TOvcVirtualListbox
Left = 434
Top = 81
Width = 196
Height = 239
HeaderColor.BackColor = clBtnFace
HeaderColor.TextColor = clBtnText
IntegralHeight = False
ProtectColor.BackColor = clRed
ProtectColor.TextColor = clWhite
RowHeight = 14
ScrollBars = ssHorizontal
SelectColor.BackColor = clHighlight
SelectColor.TextColor = clHighlightText
OnGetItem = VlbListbox3GetItem
OnGetItemColor = VlbListbox3GetItemColor
OnTopIndexChanged = VlbListbox3TopIndexChanged
Align = alClient
Controller = OvcController2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object LsPanel1: TPanel
Left = 0
Top = 0
Width = 630
Height = 81
Align = alTop
TabOrder = 3
object LsLblRefNum: TLabel
Left = 417
Top = 39
Width = 70
Height = 14
Caption = 'Print No Ref#'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object LsLblPFontSz: TLabel
Left = 284
Top = 37
Width = 79
Height = 14
Hint = 'Specify Print "Courier New" Font Size'
Alignment = taCenter
Caption = 'Print Font Size'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
end
object LsLblVLFSz: TLabel
Left = 148
Top = 37
Width = 94
Height = 14
Hint = 'Specify Print "Courier New" Font Size'
Alignment = taCenter
Caption = 'ListBox Font Size'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
OnClick = LsLblVLFSzClick
end
object LsButSaveAs: TBitBtn
Left = 278
Top = 6
Width = 89
Height = 25
Hint = 'Save list box contents to a selected file'
Caption = '&SaveAs ...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = LsButSaveAsClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555FFFFFFFFFF5F5557777777777505555777777777757F55555555555555
055555555555FF5575F555555550055030555555555775F7F7F55555550FB000
005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
305555577F555557F7F5550E0BFBFB003055557575F55577F7F550EEE0BFB0B0
305557FF575F5757F7F5000EEE0BFBF03055777FF575FFF7F7F50000EEE00000
30557777FF577777F7F500000E05555BB05577777F75555777F5500000555550
3055577777555557F7F555000555555999555577755555577755}
NumGlyphs = 2
end
object LsButPrint: TBitBtn
Left = 149
Top = 6
Width = 89
Height = 25
Hint = 'Specify Printer before printing displayed report.'
Caption = '&Print ...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = LsButPrintClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object LsButbottom: TBitBtn
Left = 534
Top = 6
Width = 89
Height = 25
Hint = 'Return to bottom of Text List.'
Caption = 'To &Btm'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 4
OnClick = LsButbottomClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
333333333337F33333333333333033333333333333373F333333333333090333
33333333337F7F33333333333309033333333333337373F33333333330999033
3333333337F337F33333333330999033333333333733373F3333333309999903
333333337F33337F33333333099999033333333373333373F333333099999990
33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333300033333333333337773333333}
NumGlyphs = 2
end
object LsButTop: TBitBtn
Left = 406
Top = 6
Width = 89
Height = 25
Hint = 'Return to top of Text List.'
Caption = 'To &Top'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnClick = LsButTopClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
333333777777777F33333330B00000003333337F7777777F3333333000000000
333333777777777F333333330EEEEEE033333337FFFFFF7F3333333300000000
333333377777777F3333333330BFBFB03333333373333373F33333330BFBFBFB
03333337F33333F7F33333330FBFBF0F03333337F33337F7F33333330BFBFB0B
03333337F3F3F7F7333333330F0F0F0033333337F7F7F773333333330B0B0B03
3333333737F7F7F333333333300F0F03333333337737F7F33333333333300B03
333333333377F7F33333333333330F03333333333337F7F33333333333330B03
3333333333373733333333333333303333333333333373333333}
NumGlyphs = 2
end
object LsButReturn: TBitBtn
Left = 21
Top = 46
Width = 89
Height = 25
Hint = 'Return to Main Tabbed Panel'
Caption = '&Return'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ModalResult = 1
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 5
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333FF3333333333333003333333333333F77F33333333333009033
333333333F7737F333333333009990333333333F773337FFFFFF330099999000
00003F773333377777770099999999999990773FF33333FFFFF7330099999000
000033773FF33777777733330099903333333333773FF7F33333333333009033
33333333337737F3333333333333003333333333333377333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object LsButFind: TBitBtn
Left = 534
Top = 52
Width = 89
Height = 25
Hint = 'Specify string to be found in text list.'
Caption = '&Find ...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 9
OnClick = LsButFindClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003FF3FFFFF3333777003000003333
300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333
330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000
333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000
339977FF777777773377000BFB03333333337773FF733333333F333000333333
3300333777333333337733333333333333003333333333333377333333333333
333333333333333333FF33333333333330003333333333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object LsNoPrintRefNum: TCheckBox
Left = 446
Top = 54
Width = 21
Height = 19
Hint = 'Print Displayed Ref#s in Output'
ParentShowHint = False
ShowHint = True
TabOrder = 8
end
object CbFontSize: TComboBox
Left = 302
Top = 50
Width = 44
Height = 24
Hint = 'Select font size for printer output.'
ItemHeight = 16
Items.Strings = (
'8'
'9'
'10'
'11'
'12')
TabOrder = 7
Text = '8'
OnChange = CbFontSizeChange
end
object LsCbLBFontSz: TComboBox
Left = 172
Top = 50
Width = 44
Height = 24
Hint = 'Select font size for printer output.'
ItemHeight = 16
Items.Strings = (
'8'
'9'
'10'
'11'
'12')
TabOrder = 6
Text = '8'
OnChange = LsCbLBFontSzChange
end
object LsButColorPrint: TBitBtn
Left = 21
Top = 6
Width = 89
Height = 25
Hint = 'Sends displayed lines to color printer selected.'
Caption = '&Color ...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = LsButColorPrintClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
end
object LSRichEdit2: TRichEdit
Left = 111
Top = 330
Width = 185
Height = 27
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
TabOrder = 4
Visible = False
end
object LsPanel2: TPanel
Left = 0
Top = 320
Width = 630
Height = 59
Align = alBottom
Alignment = taLeftJustify
BevelOuter = bvNone
TabOrder = 1
object NFNameL: TLabel
Left = 9
Top = 3
Width = 80
Height = 16
Caption = 'New Dir = '
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
end
object OFNameL: TLabel
Left = 9
Top = 17
Width = 80
Height = 16
Caption = 'Old Dir = '
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
end
object NDirName: TLabel
Left = 90
Top = 2
Width = 4
Height = 16
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object ODirName: TLabel
Left = 90
Top = 16
Width = 4
Height = 16
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object LsLblHaltMessage: TLabel
Left = 107
Top = 36
Width = 416
Height = 16
Caption = 'System is in a disabled state processing a colored RTF request.'
Visible = False
end
end
object OvcController2: TOvcController
EntryCommands.TableList = (
'Default'
True
()
'WordStar'
False
()
'Grid'
False
())
Left = 385
Top = 339
end
object PrintDialog1: TPrintDialog
Left = 420
Top = 340
end
object SaveDialog1: TSaveDialog
DefaultExt = 'Txt'
Filter = 'All , *.*|*.*|Txt, (*.Txt)|*.Txt'
Options = [ofOverwritePrompt]
Title = 'Save Compare Results'
Left = 455
Top = 340
end
object FindDialog1: TFindDialog
OnFind = FindDialog1Find
Left = 496
Top = 329
end
end